// Evol scripts.
// Authors:
//    Reid
//    WildX
// Description:
//    Aemil

001-2-6,39,41,0	script	#001-2-6-Book1	NPC_NO_SPRITE,{

    function read_book {
        mes "";
        mes col("Master Piou sat on a tree,", 9);
        mes col("Holding a cheese in his beak.", 9);
        mes col("Master Fluffy was attracted by the odour,", 9);
        mes col("And tried to attract him thus.", 9);
        next;
        mes col("\"Mister Piou, good day to you.", 9);
        mes col("You are a handsome and good looking bird!", 9);
        mes col("In truth, if your song is as beautiful as your plumage,", 9);
        mes col("You are the Phoenix of this forest.\"", 9);
        next;
        mes col("Hearing these words the Piou felt great joy,", 9);
        mes col("And to demonstrate his beautiful voice,", 9);
        mes col("He opened his mouth wide and let drop his prey.", 9);
        mes col("The Fluffy seized it and said:", 9);
        next;
        mes col("\"My good Sir,", 9);
        mes col("Know that every flatterer,", 9);
        mes col("Lives at the expense of those who take him seriously:", 9);
        mes col("This is a lesson that is worth a cheese no doubt.\"", 9);
        next;
        mes col("The Piou, embarrassed and confused,", 9);
        mes col("Swore, though somewhat later, that he would never be ", 9);
        mes col("tricked thus again.", 9);
        next;
        mes col("-- " + l("Aesop"), 9);
    }

OnShelfUse:
    if (openbookshelf())
        read_book;
    close;

OnUse:
    if (openbook())
        read_book;
    close;

OnInit:
    .book_name$ = "The Piou and The Fluffy";
    .sex = G_OTHER;
    .distance = 1;
    end;
}

001-2-6,48,41,0	script	#001-2-6-Book2	NPC_NO_SPRITE,{

    function read_book {
        mes "";
        mes col("Poem is making the words dance", 9);
        mes col("Words become music and glance", 9);
        mes col("Over lovers under a starry night", 9);
        mes col("Whose eyes listen under Moonlight", 9);
        next;
        mes col("No matter the grammar", 9);
        mes col("If words beat in rhythm", 9);
        mes col("Find an order with them", 9);
        mes col("As on anvil strikes the hammer", 9);
        next;
        mes col("No matter the spelling", 9);
        mes col("Just say something sparkling", 9);
        mes col("If not, how could CrazyKatiektch", 9);
        mes col("Say her love to glamourous Gliktch?", 9);
        next;
        mes col("True be or not true be", 9);
        mes col("That's not the question", 9);
        mes col("And rhyming is not too", 9);
        mes col("If you don't like to", 9);
        mes col("Share your mind is your mission", 9);
        mes col("Whatever inside can be", 9);
        next;
        mes col("Don't be shy, you are nice", 9);
        mes col("From your mind, break the ice", 9);
        mes col("Whatever your idea", 9);
        mes col("It's the good one and, ahem!", 9);
        mes col("That makes everybody", 9);
        mes col("Able to write a poem", 9);
        next;
        mes col("-- " + l("Nard"), 9);
    }

OnShelfUse:
    if (openbookshelf())
        read_book;
    close;

OnUse:
    if (openbook())
        read_book;
    close;

OnInit:
    .book_name$ = "Poem about Poems";
    .sex = G_OTHER;
    .distance = 1;
    end;
}

001-2-6,43,39,0	script	#001-2-6-Book3	NPC_NO_SPRITE,{

    function read_book {
        mes "";
        mes col("Hush now and hear the chorus of the woods", 9);
        mes col("Bent trees whistling with the beat of the drum", 9);
        mes col("With no choir master nor voice to be sung", 9);
        mes col("The music of the trees floats through the breeze", 9);
        mes col("Sleep well my angel but don't follow along", 9);
        mes col("Because the voices of death sing a sweet song", 9);
        next;
        mes col("-- " + l("Princess Slayer"), 9);
    }

OnShelfUse:
    if (openbookshelf())
        read_book;
    close;

OnUse:
    if (openbook())
        read_book;
    close;

OnInit:
    .book_name$ = "Chorus of the Woods";
    .sex = G_OTHER;
    .distance = 1;
    end;
}

001-2-6,54,28,0	script	#001-2-6-Book4	NPC_NO_SPRITE,{

    function read_book {
        narrator 1,
            l("Aemil was once a magnificent land unknown to us all."),
            l("Before the end of the Mana War, a band of adventurers formed in the Ancean region of Argaes from those who had lost their homes and families."),
            l("They sailed from Hurnscald to Tulimshar and then Nivalis, the last permanent settlements of humans."),
            l("There, they gathered merchants and warriors to join them in a journey to find a new land on which to live."),
            l("The group found the support of Tulimshar's merchant lords and was given ships to sail east."),
            l("They sailed past the Clear Sea and towards the Long Ocean which nobody had explored before."),
            l("The newly created Fleet of Ancea travelled so far that they were never heard from again."),
            l("Their leaders then came to the conclusion that an alliance was the only way they could survive."),
            l("They eventually found a new land after much hardship and named it Aurora, after its beautiful sunrise."),
            l("A great city, eventually to become larger than the cities of Ancea, rose on the coast of Aemil. This city was named Esperia."),
            l("However..."),
            l("The end of the story got erased, probably because of the sea water. Some pages are still missing. Thus much is lost to time, including the author's name.");
    }

OnUse:
    if (openoldbook ())
        read_book;
    close;

OnInit:
    .sex = G_OTHER;
    .distance = 1;
    end;
}
